home *** CD-ROM | disk | FTP | other *** search
/ Chip 2004 November / Chip_2004-11_cd1.bin / software / frigate / Frigate3_Lite_v25.exe / {app} / Addons / Schemes / VBasic.sch < prev    next >
Text File  |  2004-01-06  |  4KB  |  135 lines
  1. object TPersHolder
  2.   P.Name = 'Visual Basic'
  3.   P.Extensions.Strings = (
  4.     'bas')
  5.   P.SyntaxBlocks = <
  6.     item
  7.       Name = 'Default'
  8.       ID = 0
  9.       FIText = 0
  10.       FIIntNum = 1
  11.       FIFloatNum = 2
  12.       FIHexNum = 3
  13.       FIDirective = 4
  14.       UseLineDirectives = True
  15.       UseComments = True
  16.       UseSingleLineComments = True
  17.       UseStrings = True
  18.       UseSingleLineStrings = True
  19.       UseNumbers = True
  20.       UseSuffixedIdentifiers = True
  21.       UseKeywords = True
  22.       BlockDelimiters = <>
  23.       LineDirectivePrefix = '#'
  24.       SingleLineCommentDelimiters = <
  25.         item
  26.           FontID = 5
  27.           LeftDelimiter = #39
  28.         end
  29.         item
  30.           FontID = 6
  31.           LeftDelimiter = 'rem'
  32.         end>
  33.       SingleLineStringDelimiters = <
  34.         item
  35.           FontID = 7
  36.           LeftDelimiter = '"'
  37.           RightDelimiter = '"'
  38.         end>
  39.       IdentSuffixes = <
  40.         item
  41.           LeftDelimiter = '$'
  42.         end>
  43.       KeywordSets = <
  44.         item
  45.           FontID = 8
  46.           Name = 'reserved'
  47.           Keywords =
  48.             'addressof,and,appactivate,as,base,beep,binary,byref,byval,call,c' +
  49.             'ase,chdir,chdrive,close,compare,const,date,declare,deftype,delet' +
  50.             'esetting,dim,do,each,else,empty,end,enum,eqv,erase,error,event,e' +
  51.             'xit,explicit,false,filecopy,for,friend,function,get,gosub,goto,i' +
  52.             'f,imp,implements,input,is,kill,len,let,like,line,load,lock,loop,' +
  53.             'lset,me,mid,mkdir,mod,name,new,next,not,nothing,null,on,open,opt' +
  54.             'ion,optional,or,paramarray,print,private,property,public,put,rai' +
  55.             'seevent,randomize,redim,rem,reset,resume,return,rmdir,rset,savep' +
  56.             'icture,savesetting,seek,select,sendkeys,set,setattr,static,step,' +
  57.             'stop,string,sub,then,time,to,true,type,unload,unlock,wend,while,' +
  58.             'width,with,withevents,write,xor'
  59.         end>
  60.     end>
  61.   P.FontTable = <
  62.     item
  63.       FontID = 0
  64.       Font.Charset = DEFAULT_CHARSET
  65.       Font.Color = clBlack
  66.       Font.Height = -13
  67.       Font.Name = 'Courier New'
  68.       Font.Style = []
  69.     end
  70.     item
  71.       FontID = 1
  72.       Font.Charset = DEFAULT_CHARSET
  73.       Font.Color = clGreen
  74.       Font.Height = -13
  75.       Font.Name = 'Courier New'
  76.       Font.Style = []
  77.     end
  78.     item
  79.       FontID = 2
  80.       Font.Charset = DEFAULT_CHARSET
  81.       Font.Color = clGreen
  82.       Font.Height = -13
  83.       Font.Name = 'Courier New'
  84.       Font.Style = []
  85.     end
  86.     item
  87.       FontID = 3
  88.       Font.Charset = DEFAULT_CHARSET
  89.       Font.Color = clGreen
  90.       Font.Height = -13
  91.       Font.Name = 'Courier New'
  92.       Font.Style = []
  93.     end
  94.     item
  95.       FontID = 4
  96.       Font.Charset = DEFAULT_CHARSET
  97.       Font.Color = clGreen
  98.       Font.Height = -13
  99.       Font.Name = 'Courier New'
  100.       Font.Style = [fsBold]
  101.     end
  102.     item
  103.       FontID = 5
  104.       Font.Charset = DEFAULT_CHARSET
  105.       Font.Color = clGray
  106.       Font.Height = -13
  107.       Font.Name = 'Courier New'
  108.       Font.Style = [fsItalic]
  109.     end
  110.     item
  111.       FontID = 6
  112.       Font.Charset = DEFAULT_CHARSET
  113.       Font.Color = clGray
  114.       Font.Height = -13
  115.       Font.Name = 'Courier New'
  116.       Font.Style = [fsItalic]
  117.     end
  118.     item
  119.       FontID = 7
  120.       Font.Charset = DEFAULT_CHARSET
  121.       Font.Color = clMaroon
  122.       Font.Height = -13
  123.       Font.Name = 'Courier New'
  124.       Font.Style = []
  125.     end
  126.     item
  127.       FontID = 8
  128.       Font.Charset = DEFAULT_CHARSET
  129.       Font.Color = clBlue
  130.       Font.Height = -13
  131.       Font.Name = 'Courier New'
  132.       Font.Style = [fsBold]
  133.     end>
  134.   P.SyntaxVersion = 2
  135. end